;;; testing.lisp
;;; Universidad del Valle de Guatemala
;;; Algoritmos y estructura de datos 
;;; por Rodrigo Kestler 10148 y Raul Rivera 10099
;;;
;;; los comentarios se encuentran despues de ";;;"
;;; los encabezados de funciones se encuentran despues de ";;"
;;; Los comentarios entre lineas estan despues de ";"
;;;

;;
;; Triple the value of a number
;;

(defun triple (X)
  "Compute three times X."  ; este metodo multiplica por 3 un valor que se ingrese
  (* 3 X))                  ; este algoritmo esta en prefix de primero el operador y leugo los operandos

;;
;; este metodo niega el signo de un valor 
;;

(defun negate (X)
  "Negate the value of X."  ; este cambia el signo del valor de x.
  (- X))                